home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Taifun / Taifun 055 (1988-05-15)(Ossowski, Stefan)(DE)(PD).zip / Taifun 055 (1988-05-15)(Ossowski, Stefan)(DE)(PD).adf / Berserk / mot / bikepath.c < prev    next >
Text File  |  1988-04-10  |  840b  |  45 lines
  1. /*  :ts=8 bk=0
  2. */
  3.  
  4. #define    FRAMES        46
  5. #define    GRAVITY        0.6
  6. #define    VINIT        27.6
  7. #define    YBASE        200.0
  8. #define    SX        145.1227
  9. #define    EX        111.0721
  10.  
  11. main ()
  12. {
  13.     float x, y, step, pitch, twist, tilt;
  14.     register int i;
  15.  
  16.     /*  Left to right flight  */
  17.     step = (SX + EX) / FRAMES;
  18.     pitch = twist = 0;
  19.     tilt = -90;
  20.  
  21.     for (i=0, x=-SX; i<FRAMES; i++) {
  22.         y = -GRAVITY * i*i + VINIT * i;
  23.         printf ("%.4f %.4f 0\t%.4f %.4f %.4f\n",
  24.             x, y+YBASE, twist, pitch, tilt);
  25.         twist += 360.0 / FRAMES;
  26.         tilt += 180.0 / FRAMES;
  27.         x += step;
  28.     }
  29.     puts ("");
  30.  
  31.     /*  Right to left flight  */
  32.     pitch = twist = 0;
  33.     tilt = 90;
  34.  
  35.     for (i=0, x=SX; i<FRAMES; i++) {
  36.         y = -GRAVITY * i*i + VINIT * i;
  37.         printf ("%.4f %.4f 0\t%.4f %.4f %.4f\n",
  38.             x, y+YBASE, twist, pitch, tilt);
  39.         twist += 360.0 / FRAMES;
  40.         tilt += 540.0 / FRAMES;
  41.         pitch -= 360.0 / FRAMES;
  42.         x -= step;
  43.     }
  44. }
  45.